home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / AVOGADRO / CHEMISTRY / ISOMASS / !IsoMass / !Run < prev    next >
Text File  |  1996-02-22  |  825b  |  31 lines
  1. | > !IsoMass.!Run
  2. |
  3. | Run File for Isotope Abundance Distribution
  4. | Calculator for Mass Spectra
  5. | 
  6. | by Chris Johnson
  7. |
  8. |
  9. | Find path to file
  10. Set IsoMass$Dir <Obey$Dir>
  11. |
  12. |
  13. IconSprites <Obey$Dir>.!Sprites
  14. set temp$flag 1
  15. RMEnsure ABCLibrary 0 set temp$flag 0
  16. RMensure ABCLibrary 4.02 if "<temp$flag>" = "1" Then Error 0 Old ABCLib installed Else RMLoad <Obey$Dir>.ABCLib
  17. RMensure ABCLibrary 4.02 Error You need the ABClibrary ver 4.02 or later installed
  18. |
  19. |
  20. set temp$flag 1
  21. RMEnsure CJWimpUtil 0 set temp$flag 0
  22. RMEnsure CJWimpUtil 0.17 if "<temp$flag>" = "1" Then Error 0 Old CJWimpUtil installed Else RMLoad <Obey$Dir>.cjWimpUtil
  23. RMEnsure CJWimpUtil 0.17 Error You need the CJWimpUtil module installed
  24. unset temp$flag
  25. |
  26. | Check memory allocation
  27. WimpSlot -min 56K -max 56K
  28. |
  29. | Now start program
  30. Run <IsoMass$Dir>.!RunImage
  31.